
Namespace _2bMatesSite.Controls
	Imports System
	Imports System.Data
	Imports System.Drawing
	Imports System.Web
	Imports System.Web.UI.WebControls
	Imports System.Web.UI.HtmlControls

	''' <summary>
	'''		Summary description for GroupMsgTabs.
	''' </summary>
	Public Partial Class GroupMsgTabs
		Inherits System.Web.UI.UserControl
		Protected lGroupsMainOn As System.Web.UI.WebControls.HyperLink
		'protected System.Web.UI.WebControls.HyperLink hlConfirmFriends;


		Private pageName As String = ""
		Private activeTab As Integer = -1

		Public Property PageName() As String
			Get
				Return pageName
			End Get
			Set
				pageName = value
			End Set
		End Property

		Public Property ActiveTab() As Integer
			Get
				Return activeTab
			End Get
			Set
				activeTab = value
			End Set
		End Property

		Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
			' Put user code to initialize the page here
			tdGroupsMainLink.Visible = False
			tdGroupsMainLinkOn.Visible = False
			tdGroupsMainLabelOn.Visible = False
			tdGroupCategoriesLink.Visible = False
			tdGroupCategoriesLinkOn.Visible = False
			tdGroupCategoriesOn.Visible = False
			tdMyGroupsLink.Visible = False
			tdMyGroupOn.Visible = False
			tdCreateGroupsLink.Visible = False
			tdCreateGroupsOn.Visible = False
			tdSearchLink.Visible = False
			tdSearchLinkOn.Visible = False
			tdSearchOn.Visible = False

			Select Case pageName
				Case Constants.GROUPS_MAIN
					tdGroupsMainLabelOn.Visible = True
					tdGroupCategoriesLink.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchLink.Visible = True
					Exit Select
				Case Constants.GROUP_CATEGORIES
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesOn.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchLink.Visible = True
					Exit Select
				Case Constants.CATEGORY_GROUPS
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesLinkOn.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchLink.Visible = True
					Exit Select
				Case Constants.MY_GROUPS
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesLink.Visible = True
					tdMyGroupOn.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchLink.Visible = True
					Exit Select
				Case Constants.CREATE_GROUP
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesLink.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsOn.Visible = True
					tdSearchLink.Visible = True
					Exit Select
				Case Constants.ADV_GROUP_SEARCH
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesLink.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchOn.Visible = True
					Exit Select
				Case Constants.GROUP_SEARCH_RESULTS
					tdGroupsMainLink.Visible = True
					tdGroupCategoriesLink.Visible = True
					tdMyGroupsLink.Visible = True
					tdCreateGroupsLink.Visible = True
					tdSearchLinkOn.Visible = True
					Exit Select
			End Select
		End Sub

		#region Web Form Designer generated code
		Protected Overloads Overrides Sub OnInit(ByVal e As EventArgs)
			'
			' CODEGEN: This call is required by the ASP.NET Web Form Designer.
			'
			InitializeComponent()
			MyBase.OnInit(e)
		End Sub

		''' <summary>
		'''		Required method for Designer support - do not modify
		'''		the contents of this method with the code editor.
		''' </summary>
		Private Sub InitializeComponent()
		End Sub
#End Region
	End Class
End Namespace






